Imports System.Data.OleDb
Imports System.Data.SqlClient

Public Class Districts

    Shared Function Get_ENAODistricts() As SqlDataReader
        Dim conPubs As SqlConnection
        Dim cmdSelect As SqlCommand
        Dim dtrTitles As SqlDataReader
        Dim strSql As String

        strSql = "SELECT * from ENAO_Districts where Active_Status = 'Y'"

        conPubs = New SqlConnection(ConfigurationManager.ConnectionStrings("SQLConnectionString").ConnectionString.ToString)
        cmdSelect = New SqlCommand(strSql, conPubs)
        conPubs.Open()
        dtrTitles = cmdSelect.ExecuteReader()

        'ddlProvinceProInfo.DataSource = dtrTitles
        'ddlProvinceProInfo.DataBind()
        Return dtrTitles
        dtrTitles.Close()
        conPubs.Close()
    End Function

End Class
